<script>on mouseUpglobal qpModeGrab,qpModeKill,qpEffectif qpModeKill then exit mouseUpif not qpModeGrab thenput (line 3 of fld "time") into qpEffectlock screengo next cdend ifend mouseUpon mouseStillDownglobal qpModeGrabif qpModeGrab thenset the cursor to "Grabber"set the loc of me to the mouseLocend ifend mouseStillDown</script>
</part>
<part>
<id>2</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>551</left>
<top>440</top>
<right>577</right>
<bottom>465</bottom>
</rect>
<style>opaque</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>17779</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>next</name>
<script>on mouseUpglobal qpModeGrab,qpModeKill,qpEffectif qpModeKill then exit mouseUpif not qpModeGrab thenput (line 3 of fld "time") into qpEffectlock screengo prev cdend ifend mouseUpon mouseStillDownglobal qpModeGrabif qpModeGrab thenset the cursor to "Grabber"set the loc of me to the mouseLocend ifend mouseStillDown</script>
</part>
<part>
<id>3</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>65375</left>
<top>455</top>
<right>282</right>
<bottom>469</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Helvetica</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>number</name>
<script>on mouseDownglobal qpModeGrabif not qpModeGrab then exit mouseDownput the mouseLoc into currMouseput botRight of target into cornerif the style of me is "scrolling" thenput (item 1 of corner)-20 into item 1 of cornerend ifif item 1 of corner - item 1 of currMouse < 10 and ¬item 2 of corner - item 2 of currMouse < 10 then put true into growMiconelse put false into growMiconset the cursor to grabberrepeat until the mouse is upset the loc of me to the mouseLocend repeatend mouseDown</script>
</part>
<part>
<id>4</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>0</left>
<top>0</top>
<right>33</right>
<bottom>31</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Helvetica</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>miconList</name>
<script></script>
</part>
<part>
<id>5</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <true /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>0</left>
<top>1</top>
<right>12</right>
<bottom>16</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>field data</name>
<script>on mouseDownglobal qpModeKill,qpModeGrabif qpModeKill thenput (long name of me)&","&(number of me) into line 4 of fld "field data"killFldend ifif not qpModeGrab then exit mouseDownput the mouseLoc into currMouseput botRight of target into cornerif the style of me is "scrolling" thenput (item 1 of corner)-20 into item 1 of cornerend ifif item 1 of corner - item 1 of currMouse < 10 and ¬item 2 of corner - item 2 of currMouse < 10 then put true into growMiconelse put false into growMiconif growMicon thenset the cursor to "drag"repeat until the mouse is upput the mouseLoc into mousePtif currMouse <> mousePt thenput item 1 of currMouse - item 1 of mousePt into currMouseHput item 2 of currMouse - item 2 of mousePt into currMouseVput rect of target into newPosput item 3 of newPos - currMouseH into item 3 of newPosput item 4 of newPos - currMouseV into item 4 of newPosput mousePt into currMouseset rect of target to newPosend ifend repeatelseset the cursor to grabberrepeat until the mouse is up -- no Micon - drag the btn itsef aroundput the mouseLoc into mousePtif currMouse <> mousePt thenput item 1 of currMouse - item 1 of mousePt into currMouseHput item 2 of currMouse - item 2 of mousePt into currMouseVput rect of target into newPosput item 1 of newPos - currMouseH into item 1 of newPosput item 2 of newPos - currMouseV into item 2 of newPosput item 3 of newPos - currMouseH into item 3 of newPosput item 4 of newPos - currMouseV into item 4 of newPosput mousePt into currMouseset rect of target to newPosend ifend repeatend ifend mouseDownon openFieldput (long name of me) into line 4 of fld "field data"openField2end openField</script>
</part>
<part>
<id>6</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>5</left>
<top>2</top>
<right>17</right>
<bottom>17</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>field data/2</name>
<script>on mouseDownglobal qpModeFieldsif not qpModeFields then exit mouseDownput the mouseLoc into currMouseput botRight of target into cornerif the style of me is "scrolling" thenput (item 1 of corner)-20 into item 1 of cornerend ifif item 1 of corner - item 1 of currMouse < 10 and ¬item 2 of corner - item 2 of currMouse < 10 then put true into growMiconelse put false into growMiconif growMicon thenrepeat until the mouse is upput the mouseLoc into mousePtif currMouse <> mousePt thenput item 1 of currMouse - item 1 of mousePt into currMouseHput item 2 of currMouse - item 2 of mousePt into currMouseVput rect of target into newPosput item 3 of newPos - currMouseH into item 3 of newPosput item 4 of newPos - currMouseV into item 4 of newPosput mousePt into currMouseset rect of target to newPosend ifend repeatelseset the cursor to grabberrepeat until the mouse is upset the loc of me to the mouseLocend repeatend ifend mouseDown</script>
</part>
<part>
<id>7</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>0</left>
<top>0</top>
<right>100</right>
<bottom>100</bottom>
</rect>
<style>opaque</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>picture data</name>
<script>on mouseDownglobal qpModeKill,qpModeGrabif qpModeKill thenput (short id of me) into line 4 of fld "field data"killPICTexit mouseDownend ifif not qpModeGrab thenhidePICTSshowPICTSexit mouseDownend ifput the mouseLoc into currMouseput botRight of target into cornerif the style of me is "scrolling" thenput (item 1 of corner)-20 into item 1 of cornerend ifif item 1 of corner - item 1 of currMouse < 10 and ¬item 2 of corner - item 2 of currMouse < 10 then put true into growMiconelse put false into growMiconif growMicon thenset the cursor to "drag"repeat until the mouse is upput the mouseLoc into mousePtif currMouse <> mousePt thenput item 1 of currMouse - item 1 of mousePt into currMouseHput item 2 of currMouse - item 2 of mousePt into currMouseVput rect of target into newPosput item 3 of newPos - currMouseH into item 3 of newPosput item 4 of newPos - currMouseV into item 4 of newPosput mousePt into currMouseset rect of target to newPosend ifend repeatelseset the cursor to grabberrepeat until the mouse is up -- no Micon - drag the btn itsef aroundput the mouseLoc into mousePtif currMouse <> mousePt thenput item 1 of currMouse - item 1 of mousePt into currMouseHput item 2 of currMouse - item 2 of mousePt into currMouseVput rect of target into newPosput item 1 of newPos - currMouseH into item 1 of newPosput item 2 of newPos - currMouseV into item 2 of newPosput item 3 of newPos - currMouseH into item 3 of newPosput item 4 of newPos - currMouseV into item 4 of newPosput mousePt into currMouseset rect of target to newPosend ifend repeatend ifend mouseDown</script>
</part>
<part>
<id>8</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>0</left>
<top>0</top>
<right>12</right>
<bottom>12</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>time</name>
<script></script>
</part>
<part>
<id>9</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <true /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>3</left>
<top>6</top>
<right>33</right>
<bottom>18</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>field data/3</name>
<script></script>
</part>
<content>
<layer>background</layer>
<id>5</id>
<text>rectangletruecard field id 2 of card id 8441 of stack "Macintosh HD:Gene's VideoShop:CD Release:READ ME"</text>